Thema Datum  Von Nutzer Rating
Antwort
06.03.2020 18:45:30 Niels
NotSolved
07.03.2020 11:04:10 Gast2785
NotSolved
Rot VBA Code -> PDF erstellen und als E-Mail Anhang in Outlook versenden
 07.03.2020 23:55:57 Gast7351
NotSolved
09.03.2020 18:29:20 Niels
NotSolved
09.03.2020 19:29:46 Gast7777
NotSolved

Ansicht des Beitrags:
Von:
Gast7351		 Datum:
07.03.2020 23:55:57		 Views:
508		 Rating:
     
Antwort:
  Ja
Thema:
VBA Code -> PDF erstellen und als E-Mail Anhang in Outlook versenden

Also ohne das ich mir den Code genau angesehen habe und was er im einzelnen macht, aber wenn bei stimmen und das einzige Problem das zusammenfügen ist, dann:

Private Sub CommandButton4_Click()
Dim Nachricht As Object, OutlookApplication As Object
Set OutlookApplication = CreateObject("Outlook.Application")
Dim Anhang As String
Anhang = ThisWorkbook.FullName
Set Nachricht = OutlookApplication.CreateItem(0)
With Nachricht
.To = Range("E15").Value
.Subject = Range("A15").Value & Range("D15").Value
.attachments.Add Anhang
.Body = "Test 123"
.Display
End With
Set OutlookApplication = Nothing
Set Nachricht = Nothing

ChDir "C:\Users"
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        "Test Doc. ".pdf", Quality:=xlQualityStandard, _
        IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
        False
End Sub

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
06.03.2020 18:45:30 Niels
NotSolved
07.03.2020 11:04:10 Gast2785
NotSolved
Rot VBA Code -> PDF erstellen und als E-Mail Anhang in Outlook versenden
 07.03.2020 23:55:57 Gast7351
NotSolved
09.03.2020 18:29:20 Niels
NotSolved
09.03.2020 19:29:46 Gast7777
NotSolved